Top 10k strings from Sound Basic v1.7 (1985)(Mapasoft)(pl).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /
Back to the directory listing
3 *SOUND 10
2 Przyk[ady:
2 '"Instrukcja
2 *SOUND -1
1 |0f>0fVf0f
1 x,z:*ENV 7
1 w$="* * * * * * * * * * *
1 spacje dla przejrzysto|ci"
1 spacje dla przejrzysto|ci
1 i+ "cc#dd#eff#gg#aa#bo4c"
1 i+ ""cc#dd#eff#gg#aa#bo4c"""
1 f0ff0>V>0f
1 a$="geefddl10cel40g"
1 a$=""geefddl10cel40g"""
1 a$-97: *PLAY a$:
1 `pne d~wi`ki b`d@ gra-ne wg obwiedni, kt]rej numer jest za ""
1 Wywo[anie przyk[ad]w przez:
1 R-repeat,P-printer,C-BASIC-SOUND
1 Press D - DEMO or a key to go on
1 Play a to g or ENTER to return.
1 P - printer, any key - continue.
1 Format 3 argumentowy"
1 Format 2 argumentowy
1 FT" Zak[ad Oprogramowania Minikomputerowego KRAKOW ul T.KO|ciuszki 82. Wszelkie prawa zastrze}one. Kopiowanie i odtwarzanie publiczne zabronione. * * * * * * * * * * *":
1 D-DEMO,P-printer,a key to go on.
1 ;"p-sound"
1 ;"mapasoft"
1 ;"cdedefefgfgagab":
1 ;"Instrukcja
1 :*SOUND -1
1 : *PLAY a$:
1 62575 pami`taj@c o uwadze 5."
1 61771,2800
1 4:*SOUND -1,200*i,3:
1 40+""y0c"":
1 1985 MAPASOFT - SOUND BASIC 1.7
1 1985 MAPASOFT
1 1985 "MAPASOFT" Zak[ad Oprogramowania Minikomputerowego KRAKOW ul T.KO|ciuszki 82. Wszelkie prawa zastrze}one. Kopiowanie i odtwarzanie publiczne zabronione. * * * * * * * * * * *L
1 1985 ""MAPASOFT"" Zak[ad Oprogramowania Minikomputerowego KRAKOW ul T.KO|ciuszki 82. Wszelkie prawa zastrze}one. Kopiowanie i odtwarzanie publiczne zabronione. * * * * * * * * * * *":
1 12: *PLAY
1 10,0;""cdedefefgfgagab"":
1 10+""ce""+
1 .,wyr,wyr,wyr"
1 . Format instrukcji jest nast`puj@cy:"
1 -8))8,]T)8')8$
1 + Press ENTER to continue +
1 *SOUND wyr,wyr:
1 *SOUND wyr,wyr,wyr:
1 *PLAY string
1 *PLAY "x0Y3O1cdefgabo2cdefgabo3cdefgabo4cdefgabo5cdefgabo6cdefgabo7cdefgabX2":
1 *PLAY "x0":
1 *PLAY "l10g#o2ed#g#o3g#o2d#c#g#o3g#o2c#o1bo2g#o3a#o1ba#o2g":
1 *PLAY "l10g#f#ed#"
1 *PLAY "l10c#o2ao3ao2g#o3g#o2go3go2g#o3g#o2c#o3c#d#o2c#o1ba#":
1 *PLAY "l10c#g#o4eo3acf#o4d#o3bg#eo4c#o3f#g#d#o4co3e":
1 *PLAY "l10c#d#cc#d#ec#d#ef#d#ef#g#ef#g#ag#o4c#o3f#g#f#o4c#o3ef#eo4c#o3d#ed#o4c#":
1 *PLAY "l10bo2ebd#o4d#o2ea#d#o3bo2ebd#o3d#o2ea#d#":
1 *PLAY "l10bo1a#gg#o3go1bg#a#o3g#o2c#o1a#bo3g#o2d#o1bo2c#":
1 *PLAY "l10begd#g#ga#f#bao4co3g#o4c#cd#":
1 *ENV w,wyr,wyr,wyr,,,wyr,wyr,wyr
1 *EFFECT w,t,wyr,wyr,wyr,
1 *1200"'" 14 *SOUND 10,-100"'" 16 *SOUND 10,-200"'" 18
1 *(2*a+b),500"'" 12 *SOUND 50,
1 *"m";1;"sound
1 *"m";1;"SOUNDBASIC":
1 *"m";1;"SOUNDBASIC"
1 * * * * * * * * * * *
1 (i/2)=i/2"
1 ''"Uwagi og]lne:"
1 ''" Program SOUND BASIC jest posze-rzeniem BASICA o dodatkowe roz- kazy pozwalaj@ce na uzyskanie nieograniczonych mo}liwo|ci efekt]w dzwi`kowych, kt]re zapewne znajd@ zastosowanie w twoich programach."
1 ''" gram przez podanie instrukcji RANDOMIZE
1 '"wysoko|ci d~wi`ku na 1 krok."
1 '"jest 2 argumentowa i 3-ci argu- ment jest przez interpreter po- mijany (znaczenie wyra}e{ jak poprzednio)."
1 '"Do uzyskiwania dzwi`k]w z[o}o- nych stosuje si` format 3 argu- mentowy w odniesieniu do instru-kcji *ENVELOPE"
1 '"1.Wszystkie dodatkowe instrukje musz@ by\ poprzedzone ""*""."
1 '" Funkcja *SOUND s[u}y do uzyski-wania prostych i z[o}onych efek-t]w dzwi`kowych. Funkcja ta mo}emie\ format 2 lub 3 argumentowy."
1 '" 500 *EFFECT 2,3,100,200,5,100,-1400,6"
1 '" 300 *EFFECT 0,2, 100,200,0, 100,400,1, 100,200,3, 100,400,4"
1 '" 140 *PLAY ""cdefgab"":
1 '" 80 *ENV 3, 30,-4,5, 20,-2,5, 10,-1,6,
1 '" 20 *ENV 0,10,-20,4"
1 '" Fragment etiudy Fryderyka Chopina, kt]ry s[yszysz zosta[ zapisany w komputerze tym pro- gramem."
1 #"a\"c\"e\
1 "W [a{cuchu mog@ si` znajdowa\ nast`puj@ce znaki (du}e i ma[e) o znaczeniu:"
1 "Instrukcja *ENV mo}e wyst`powa\ te} jako z[o}ona do max. 8 indy-widualnych sekcji (ka}da sekcja ma po 3 wyra}enia)."
1 "Grup po 3 wyra}enia mo}e by\ 8."
1 "Gdy wyra}enie drugie przyjmuje warto|ci ujemne w]wczas uzyskujesi` efekt pseudo-dwutonowy."
1 "BASICTUTOR"
1 "7.Je|li ju} dobrze znasz nowe
1 "6.W opisie format]w funkcji
1 "5.Po ka}dym NEW lub komunikacie pochodz@cym od INTERFACE 1 na- le}y ponownie zainicjowa\ pro-":
1 "4.Przekroczenie warto|ci wyra}e{ jest sygnalizowane komunikatem"
1 "3.W formatach instrukcji mo}e
1 "2.W instrukcjach mo}na u}ywa\
1 "'"stoi ""
1 "". Normalnie ""
1 "" to jest r]wnowa}ny ""o3l20y16n0
1 "" podaje czas trwania nast`p- nych d~wi`k]w w 1/100s"
1 "" okre|la pauz` w 1/100s"
1 "" jest numer oktawy, w kt]rej b`d@ grane nast`pne tony"
1 "" jest grana o p][ tonu wy}ej"
1 "" - warto|\ nuty, liczba za""
1 "" - tony muzyczne wg. no-tacji ang. (tonowi h odpowiada b)"
1 "" - przeno|nik oktawowy, za liter@ ""
1 "" - pauza, liczba stoj@ca za""
1 "" - okre|la numer kolejny de- finiowanego efektu od 0 do 7"
1 "" - odpowiada ilo|ci powt]rze{ efektu":
1 "" - krzy}yk, nuta
1 "" - graj efekt d~wi`kowy o nu-merze za ""x"" wg. instrukcji
1 "" - generator szumu wy[@cz."
1 "" - generator szumu w[@czony ""
1 " 720 *PLAY ""x5"":
1 " 710 *EFFECT 5,4,100,-1200,12"
1 " 700 *ENV 12,100,-50,5"
1 " 600 *PLAY ""x0Y3O1cdefgabo2cdefgabo3cdefgabo4cdefgabo5cdefgabo6cdefgabo7cdefgabX2"":
1 " 510 *PLAY ""x2"":
1 " 420 *SOUND -1,-1200,6:
1 " 410 *SOUND -1,20,5"
1 " 405 *ENV 6, 10,-10,3, 10,10,3, 10,-3,2, 10,3,2, 10,-1,1, 10,1,2"
1 " 400 *ENV 5, 100,10,2"
1 " 310 *PLAY ""x0"":
1 " 240 *PLAY a$+a$(
1 " 210 *PLAY ""Y""+
1 " 170 *PLAY ""N1cdefgab"":
1 " 160 *PLAY ""L60cc#dd#eff#gg#aa#b"":
1 " 150 *PLAY ""cdefgabo4cdefgabo5c"":
1 " 120 *SOUND -3,100*i,4"
1 " 110 *ENV 4,2*i,-i,4+i/2, i/2,i,6"
1 " 50 *SOUND 10,-200"
1 " 40 *SOUND -i,200,
1 " 25 *ENV 1,5,20,8"
1 " 10 *SOUND
1 znajdowa\ si` dowolne wyra}e- nie BASIC'a."
1 zar]wno du}ych jak i ma[ych
1 wyra}enie okre|laj@ce numer kolejny jednej z 16 obwiedni
1 w zakresie 8 oktaw. Jest ona po-dobna do funkcji BEEP lecz zna- cznie szybsza w dzia[aniu i po- r`czniejsza do wprowadzania nut.Format jej jest nast`puj@cy:"
1 w 1/100 sek"'"
1 skr]t wyr. okre|la dowolne wy- ra}enie BASIC'a sk[adaj@ce si` ze sta[ych, zmiennych, funkcji i operator]w."
1 s[u}y do wydo- bywania dzwi`k]w muzycznych
1 s[u}y do [@- czenia do 8-miu pojedynczych dzwi`k]w w jeden efekt dzwi`ko- wy przy czym ka}dy z dzwi`k]w sk[adowych mo}e by\ dodatkowo okre|lony instr.
1 podaje wysoko|\ d~wi`ku przy czym wiekszym warto|ciom odpowiada ni}szy d~wi`k."
1 podaje numer wcze|niej zdefiniowanej instrukcj@ *ENV obwiedni wg. kt]rej ma nast`po- wa\ zmiana d~wi`ku."
1 podaje ilo|\ krok]w zmianywysoko|ci d~wi`ku."
1 opre|la pocz@tkow@ wyso- ko|\ d~wi`ku"
1 okre|la wysoko|\ dzwi`ku "
1 okre|la obwiedni` wg. kt]- rej dzwi`k b`dzie wykonywany. Je|li d~wiek ma by\ prosty to
1 okre|la czas trwania dzwi`-ku w 1/100s"
1 okre|la czas trwania
1 odpowiada czasowi trwania jednego kroku (1/100s)."
1 mo}na stosowa\ alternatywnie skr]t ENV."
1 mo}e by\ w granicach 0 do 15"
1 mo}e by\ [a{cuchem zna- k]w w """", zmienn@ [a{cuchow@ lubfunkcj@ [a{cuchow@."
1 liter. Instrukcje nale}y pisa\ ca[ymi s[owami za wyj@tkiem
1 je}eli przyjmuje warto|\ ujemn@ to okre|la ilo|\ powt]- rze{ sekwencji d~wi`ku zdefinio-wanej obwiedni@ *ENVELOPE."
1 je}eli przyjmuje warto|\ dodatni@ to instrukcja *SOUND":
1 je}eli np. string=""
1 je|li >0 okre|la spadek wysoko|ci d~wi`ku na 1 krok."
1 je|li <0 okre|la przyrost":
1 instrukcje to sam SOUND BASIC mo}esz za[adowa\ przez: CLEAR 61770: LOAD""""
1 instr. ENVELOPE dla kt]rej
1 definiuje parametry wg. kt]rych bedzie wy-konywana instr. *SOUND i ma nas-t`puj@c@ posta\:
1 Press and hold SPACE to go on
1 20,10,6, 10,20,8, 10,30,10, 10,-6,1, 30,-20,6:
1 *SOUND 50
1 *SOUND -i,200
1 *SOUND -3
1 *PLAY a$+a$(
1 *PLAY "x5":
1 *PLAY "x2":
1 *PLAY "cdefgabo4cdefgabo5c":
1 *PLAY "cdefgab":
1 *PLAY "Y"+
1 *PLAY "N1cdefgab":
1 *PLAY "L60cc#dd#eff#gg#aa#b":
1 *EFFECT 5
1 * * * SOUND BASIC V1.7 * * * *
1 SOUND BASIC IS LOADING"